home *** CD-ROM | disk | FTP | other *** search
- object frmArcConvert: TfrmArcConvert
- Left = 369
- Top = 145
- BorderStyle = bsDialog
- Caption = 'frmArcConvert'
- ClientHeight = 337
- ClientWidth = 496
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poMainFormCenter
- Scaled = False
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object sbProgress: TStatusBar
- Left = 0
- Top = 318
- Width = 496
- Height = 19
- Panels = <
- item
- Width = 280
- end
- item
- Alignment = taRightJustify
- Width = 140
- end
- item
- Width = 50
- end>
- SimplePanel = False
- end
- object pControls: TPanel
- Left = 0
- Top = 0
- Width = 496
- Height = 113
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 1
- object lvFileList: TListView
- Left = 6
- Top = 6
- Width = 361
- Height = 99
- Anchors = [akLeft, akTop, akRight]
- Columns = <
- item
- Width = 330
- end>
- SmallImages = frmFilzipMain.fzImages
- TabOrder = 2
- ViewStyle = vsReport
- end
- object btnOk: TButton
- Left = 413
- Top = 8
- Width = 75
- Height = 25
- Anchors = [akRight, akBottom]
- Caption = 'btnOk'
- Default = True
- TabOrder = 0
- OnClick = btnOkClick
- end
- object btnCancel: TButton
- Left = 413
- Top = 36
- Width = 75
- Height = 25
- Anchors = [akRight, akBottom]
- Cancel = True
- Caption = 'btnCancel'
- TabOrder = 1
- OnClick = btnCancelClick
- end
- object btnAdd: TButton
- Left = 371
- Top = 8
- Width = 18
- Height = 48
- Anchors = [akTop, akRight]
- Caption = '+'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 3
- OnClick = btnAddClick
- end
- object btnDel: TButton
- Left = 371
- Top = 56
- Width = 18
- Height = 48
- Anchors = [akTop, akRight]
- Caption = '-'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 4
- OnClick = btnDelClick
- end
- end
- object pOptions: TPanel
- Left = 0
- Top = 113
- Width = 496
- Height = 205
- Align = alClient
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 2
- object pcConvert: TPageControl
- Left = 2
- Top = 2
- Width = 492
- Height = 201
- ActivePage = tsOptions
- Align = alClient
- TabOrder = 0
- object tsOptions: TTabSheet
- Caption = 'tsOptions'
- object lAction: TLabel
- Left = 0
- Top = 88
- Width = 32
- Height = 13
- Caption = 'lAction'
- end
- object cbAction: TComboBox
- Left = 48
- Top = 84
- Width = 161
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 0
- Items.Strings = (
- '*'
- '*')
- end
- object cbDelSource: TCheckBox
- Left = 224
- Top = 88
- Width = 129
- Height = 17
- Caption = 'cbDelSource'
- TabOrder = 1
- end
- object cbIntegCheck: TCheckBox
- Left = 368
- Top = 88
- Width = 110
- Height = 17
- Caption = 'cbIntegCheck'
- Checked = True
- State = cbChecked
- TabOrder = 2
- end
- object gbArcType: TRadioGroup
- Left = 0
- Top = 115
- Width = 484
- Height = 58
- Anchors = [akLeft, akRight, akBottom]
- Caption = 'Archive Type:'
- Columns = 3
- ItemIndex = 0
- Items.Strings = (
- 'BlakHole (.bh)'
- 'Cabinet (.cab)'
- 'GZip Tar (.tar.gz)'
- 'Lha (.lzh)'
- 'Tar (.tar)'
- 'Zip (.zip)')
- TabOrder = 3
- OnClick = gbArcTypeClick
- end
- object pDirectory: TPanel
- Left = 0
- Top = 0
- Width = 484
- Height = 73
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 4
- object lDirType: TLabel
- Left = 8
- Top = 44
- Width = 39
- Height = 13
- Caption = 'lDirType'
- end
- object lDir: TLabel
- Left = 8
- Top = 14
- Width = 15
- Height = 13
- Caption = 'lDir'
- end
- object edDir: TEdit
- Left = 80
- Top = 10
- Width = 281
- Height = 21
- TabOrder = 0
- Text = 'C:\'
- end
- object cbDirType: TComboBox
- Left = 80
- Top = 40
- Width = 313
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 1
- OnChange = cbDirTypeChange
- Items.Strings = (
- '*'
- '*')
- end
- object btnBrowse: TButton
- Left = 368
- Top = 12
- Width = 25
- Height = 17
- Caption = '...'
- TabOrder = 2
- OnClick = btnBrowseClick
- end
- end
- end
- object tsDetails: TTabSheet
- Caption = 'tsDetails'
- ImageIndex = 1
- object mDetails: TMemo
- Left = 0
- Top = 0
- Width = 484
- Height = 173
- Align = alClient
- ReadOnly = True
- ScrollBars = ssBoth
- TabOrder = 0
- end
- end
- end
- end
- object odAddArchives: TOpenDialog
- Options = [ofHideReadOnly, ofAllowMultiSelect, ofEnableSizing]
- Left = 456
- Top = 72
- end
- object acBrowse: TdfsBrowseDirectoryDlg
- ShowSelectionInStatus = False
- Left = 392
- Top = 72
- end
- object fzArc2Arc: TArc2Arc
- ConfirmOverwrites = True
- TempDir = 'C:\DOKUME~1\philipp\LOKALE~1\Temp\'
- OutArcType = tyBh
- OnError = fzArc2ArcError
- OnExtractActivate = fzArc2ArcExtractActivate
- OnCompressActivate = fzArc2ArcCompressActivate
- OnCompressDeactivate = fzArc2ArcCompressDeactivate
- OnCompressBegin = fzArc2ArcCompressBegin
- OnCompressEnd = fzArc2ArcCompressEnd
- OnIntegrityActivate = fzArc2ArcIntegrityActivate
- OnIntegrityDeactivate = fzArc2ArcIntegrityDeactivate
- OnFileExists = fzArc2ArcFileExists
- OnProgress = fzArc2ArcProgress
- OnGetPassword = fzArc2ArcGetPassword
- OnNextVolume = fzArc2ArcNextVolume
- OnRemoveTempfile = fzArc2ArcRemoveTempfile
- Left = 424
- Top = 72
- end
- end
-